MacHack 1996/MacHack 1996.toast/Hacks/Hacks ’91/ColorHack 1991/the demo/Startup

Text File | 1990-08-12 | 4.3 KB | 149 lines | [TEXT/MPS ]

#    Startup - MPW Shell Startup File
#
#    Copyright Apple Computer, Inc. 1985-1988
#    All Rights Reserved.


#    {Boot} - The boot disk.  (Predefined.)
            Export Boot

#    {SystemFolder} - The directory that contains System & Finder.  (Predefined.)
            Export SystemFolder

#    {ShellDirectory} - The directory that contains MPW Shell.  (Predefined.)
            Export ShellDirectory

#    {Active} - The active (topmost) window.  (Predefined.)
            Export Active

#    {Target} - The target (previously active) window.  (Predefined.)
            Export Target

#    {Worksheet} - The name of the Worksheet window.  (Predefined.)
            Export Worksheet

#    {Status} - The result of the last command executed.  (Predefined.)
            Export Status

#    {User} - Automatically defined to the name the appears in the Chooser.
            Export User

#    {MPW} - The volume or folder containing the Macintosh Programmer's Workshop.
#            If you put the MPW Shell out on the desktop, redefine this variable
#            to be {Boot}MPW:
            Set MPW "{ShellDirectory}"
            Export MPW

#    {Commands} - Directories to search for commands.
            Set Commands ":,{MPW}Tools:,{MPW}Scripts:"
            Export Commands

#    {AIncludes} - Directories to search for assembly language include files.
            Set AIncludes "{MPW}Interfaces:AIncludes:"
            Export AIncludes

#    {Libraries} - Directory that contains shared libraries.
            Set Libraries "{MPW}Libraries:Libraries:"
            Export Libraries

#    {CIncludes} - Directories to search for C include files.
            Set CIncludes "{MPW}Interfaces:CIncludes:"
            Export CIncludes

#    {CLibraries} - Directory that contains C libraries.
            Set CLibraries "{MPW}Libraries:CLibraries:"
            Export CLibraries

#    {PInterfaces} - Directories to search for Pascal interface files.
            Set PInterfaces "{MPW}Interfaces:PInterfaces:"
            Export PInterfaces

#    {PLibraries} - Directory that contains Pascal libraries.
            Set PLibraries "{MPW}Libraries:PLibraries:"
            Export PLibraries

#    {RIncludes} - Directory that contains Rez include files.
            Set RIncludes "{MPW}Interfaces:RIncludes:"
            Export RIncludes

#    {CaseSensitive} - If non-zero, pattern matching is case sensitive.
            Set CaseSensitive 0
            Export CaseSensitive

#    {SearchBackward} - If non-zero, search will go backwards.
            Set SearchBackward 0
            Export SearchBackward

#    {SearchWrap} - If non-zero, search will wrap.
            Set SearchWrap 0
            Export SearchWrap

#    {SearchType} - Specifies the default searching type.  (0/literal,
#        1/word, 2/regular expression)
            Set SearchType 0
            Export SearchType

#    {Tab} - Default tab setting for new windows.
            Set Tab 4
            Export Tab

#    {Font} - Default Font for new windows.
            Set Font Courier
            Export Font

#    {FontSize} - Default font size for new windows.
            Set FontSize 9
            Export FontSize

#    {AutoIndent} - If non-zero, auto indentation will be the default for
#        new windows.
            Set AutoIndent 1
            Export AutoIndent

#    {WordSet} - Character set that defines words for searches and double-clicks.
            Set WordSet 'a-zA-Z0-9'
            Export WordSet

#    {PrintOptions} - Options used by the Print Window and Print Selection menus.
            Set PrintOptions '-h'

#    {Exit} - If non-zero, command files terminate after the first error.
            Set Exit 1
            Export Exit

#    {Echo} - If non-zero, commands are echoed before execution.
            Set Echo 0
            Export Echo

#    {Test} - If non-zero, tools and applications are not executed.
            Set Test 0
            Export Test

#    Commando Support
             Export Windows
             Export Aliases
             Set Commando Commando
            Export Commando

#    Aliases
            Alias File Target


#    The file UserStartup can be used to override definitions made in Startup,
#    or to define additional variables, exports, and aliases.  UserStartup may
#    also be used to define menu items, open windows, etc.  The file should be
#    located in the directory containing the MPW Shell.

            Execute "{ShellDirectory}UserStartup"

#    Since UserStartup is distributed with MPW, you may want to have other
#    startup files that will not be overwritten with a new release.
#    Other personalized startup files may be named UserStartup•≈ - such as
#    "UserStartup•John" or "UserStartup•Tom"  (• is option-8).
#    These files should be located in the directory containing the MPW Shell.

            For __Startup__i in `(Files "{ShellDirectory}"UserStartup•≈ || Set Status 0) ≥ dev:null`
                Execute "{__Startup__i}"
            End
            Unset __Startup__i